(rmail-cease-edit): Call rmail-show-message even if message text is unchanged.

diff --git a/lisp/mail/rmailedit.el b/lisp/mail/rmailedit.el
index b83411ce5ae03342b5a16cbacff74c7c04a30f8e..8f5a65a9b59852145841ef9eb9ff74586f89397d 100644 (file)
--- a/lisp/mail/rmailedit.el
+++ b/lisp/mail/rmailedit.el
@@ -106,14 +106,15 @@ to return to regular RMAIL:
            (aset rmail-summary-vector (1- rmail-current-message) nil)
            (save-excursion
              (rmail-widen-to-current-msgbeg
-               (function (lambda ()
+               (function (lambda ()
                            (forward-line 2)
                            (if (looking-at "Summary-line: ")
                                (let ((buffer-read-only nil))
                                  (delete-region (point)
                                                 (progn (forward-line 1)
-                                                       (point))))))))
-             (rmail-show-message))))))
+                                                       (point))))))))))))
+    (save-excursion
+      (rmail-show-message)))
   (setq buffer-read-only t))
 
 (defun rmail-abort-edit ()